Publicado el Dejar un comentario

Código: QZVY789L para DiDi 2023

Código de promoción DiDi: QZVY789L

Aprovecha la oportunidad de viajar gratis en DiDi con este cupón.


DiDi viaje Gratis. http://bit.ly/2NuX6Fn

Pasos para viajar gratis den DiDi:

  1. Solicita tu cupón DiDi en este enlace http://bit.ly/2NuX6Fn.
  2. Descarga la app “DiDi Pasajero” en la App Store o Google Play Store según el sistema operativo de tu dispositivo móvil.
  3. Abre la app e ingresa tu número celular (10 dígitos incluyendo LADA) y acepta los términos y condiciones.
  4. Recibirás un SMS con tu código de registro, el cual tendrás que colocar en los recuadros correspondientes.
  5. Establece una contraseña segura de acuerdo a los requisitos que te aparecerán en la pantalla.
  6. Ingresa tus datos personales y tu forma de pago.
  7. ¡Estás listo para pedir tu primer viaje en DiDi!

.

  • Si ya son usuarios de DiDi, colocar el código QZVY789L. Ese código pueden compartirlo con sus amigos, quienes también recibirán un viaje gratis. El código pueden enviarlo las veces que requieran.
  • Si ingresas el código “QZVY789Len tu primer y segundo viaje con monto menor a 100 pesos, este será gratuito.
Publicado el Dejar un comentario

Código Uber: 9yewhp para 2023

Código de promoción Uber: 9yewhp

Aprovecha la oportunidad de viajar gratis en Uber con este cupón.

Uber viaje Gratis dos veces. https://goo.gl/mgpm9Z

  • Si ya son usuarios de Uber, colocar el código 9yewhp. Ese código pueden compartirlo con sus amigos, quienes también recibirán un viaje gratis. El código pueden enviarlo las veces que requieran.
  • Si usted ingresa el código “9yewhpen su primer y segundo viaje con monto menor a 150 pesos será gratuito.
  • Disponible para aquellos usuarios que nunca han utilizado la app. Para obtener este viaje deben descargar la aplicación, ingresar sus datos personales y en el apartado de “Pago” y verá un espacio para capturar “Promociones”, ingresar un código promoción 9yewhp.

Gracias a José Carlos por brindarme este viaje gratis (0 pesos)

Publicado el Dejar un comentario

Código kv66wr78ue para Abril 2023

Código de promoción: kv66wr78ue

Uber viaje Gratis dos veces.

https://goo.gl/gqqEKs

Aprovecha la oportunidad de viajar gratis en Uber con este cupón:

  • Disponible para aquellos usuarios que nunca han utilizado la app. Para obtener este viaje deben descargar la aplicación, ingresar sus datos personales y en el apartado de “Pago” y verá un espacio para capturar “Promociones”, ingresar un código promocional kv66wr78ue.
  • Si ya son usuarios de Uber, colocar el código kv66wr78ue. Ese código pueden compartirlo con sus amigos, quienes también recibirán un viaje gratis. El código pueden enviarlo las veces que requieran.
  • Si usted ingresa el código “kv66wr78ueen su primer y segundo viaje con monto menor a 100 pesos será gratuito.

Código kv66wr78ue para viajar gratis

También aplica para usuarios registrados recientemente, puedes intentarlo

https://goo.gl/gqqEKs

Publicado el Dejar un comentario

Error de impresión FacturaSAT.CFDlSAT

429:EI componente Activex no puede crear el objeto: ‘FacturaSAT.CFDISAT’ in line 351

Sistema: 429 El componente Activex no puede crear el objeto: ‘FacturaSAT.CFDlSAT

Publicado el Dejar un comentario

Compartiendo Codigo (Crear Reporte)

Mediante estas lineas se creara un reporte de articulos.
Tabla Prods
articulos
descrip
precio1
existencia
lineas

1.-Business Manager
2.-Reportes
3.-Nuevo

pegar estas lineas

          IniciaDocumento()

' El reporte lo queremos horizontal   

rem articulo,descrip,existencia,precio1,unidad,linea
rem son los registros de la tabla prods

      strSQL = "" 
      strSQL = strSQL & "SELECT "
      strSQL = strSQL & "prods.articulo, " 
      strSQL = strSQL & "prods.descrip, "
      strSQL = strSQL & "prods.existencia, "
      strSQL = strSQL & "prods.precio1, "
      strSQL = strSQL & "prods.unidad, "
      strSQL = strSQL & "prods.linea " 
    ' la tabla es prods
      strSQL = strSQL & "FROM prods "
      strSQL = strSQL & "WHERE prods.articulo <> 'SYS' "
      strSQL = strSQL & cCondicion
      strSQL = strSQL & "ORDER BY prods.articulo "
      Reporte.SQL = strSQL 
      Reporte.RetrieveColumns   

'   Coloca el titulo del registro
      Reporte.Columns("articulo").Titulo = "ARTICULO"  
      Reporte.Columns("Descrip").Titulo = "DESCRIPCION"

'Coloca el formato de salida del registro existencia
      Reporte.Columns("existencia").Formato = "##0.0"



      Reporte.ImprimeReporte
FinDocumento()